object Form1: TForm1
  Left = 118
  Top = 79
  BorderStyle = bsNone
  Caption = 'Form1'
  ClientHeight = 349
  ClientWidth = 460
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  TextHeight = 16
  object flb1: TFileListBox
    Left = 280
    Top = 72
    Width = 145
    Height = 97
    ItemHeight = 13
    Mask = '*.bmp'
    TabOrder = 0
    Visible = False
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 460
    Height = 349
    Align = alClient
    BevelInner = bvLowered
    BorderWidth = 3
    BorderStyle = bsSingle
    Caption = 'Panel2'
    TabOrder = 1
    object Image2: TImage
      Left = 5
      Top = 5
      Width = 448
      Height = 337
      Align = alClient
      Picture.Data = {<image000.bmp>}
      OnMouseMove = Image2MouseMove
    end
    object Label2: TLabel
      Left = 389
      Top = 300
      Width = 29
      Height = 16
      Caption = 'EXIT'
      Font.Color = clGray
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
      OnClick = Label2Click
      OnMouseMove = Label2MouseMove
    end
    object Label1: TLabel
      Left = 387
      Top = 260
      Width = 34
      Height = 16
      Caption = 'PLAY'
      Font.Color = clGray
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
      OnClick = Label1Click
      OnMouseMove = Label1MouseMove
    end
    object Label3: TLabel
      Left = 387
      Top = 215
      Width = 34
      Height = 16
      Caption = 'VIEW'
      Font.Color = clGray
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
      OnClick = Label3Click
      OnMouseMove = Label3MouseMove
    end
    object DLB: TDirectoryListBox
      Left = 24
      Top = 120
      Width = 129
      Height = 20
      ItemHeight = 16
      TabOrder = 1
      Visible = False
      OnChange = DLBChange
    end
    object Panel1: TPanel
      Left = 8
      Top = 8
      Width = 105
      Height = 105
      BevelOuter = bvNone
      Caption = 'Panel1'
      Color = clBlack
      TabOrder = 0
      object Image1: TImage
        Left = 0
        Top = 0
        Width = 105
        Height = 105
        Center = True
      end
    end
  end
  object flb2: TFileListBox
    Left = 24
    Top = 144
    Width = 129
    Height = 169
    Color = clTeal
    Ctl3D = True
    DragCursor = crCross
    ItemHeight = 13
    Mask = '*.mpg'
    ParentCtl3D = False
    TabOrder = 2
    Visible = False
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 248
    Top = 104
  end
end